home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_oth / mod2math / mathlibs.def next >
Text File  |  1986-03-08  |  640b  |  15 lines
  1.  
  2. DEFINITION MODULE MathLibS;
  3. (*                                                            *)
  4. (*   Math routines that work with the 8087
  5.      contributed by Steve Eckhart                             *)
  6. (*                                                            *)
  7.   EXPORT QUALIFIED sin, cos, atan, sqrt;
  8.   PROCEDURE sin(x : REAL) : REAL;
  9.       (*series expansion for sin(x) *)
  10.   PROCEDURE cos(x : REAL) : REAL;
  11.       (*series expansion for cos(x) *)
  12.   PROCEDURE atan(x : REAL) : REAL;
  13.   PROCEDURE sqrt(x : REAL) : REAL;
  14.   END MathLibS.
  15.